object FormValue: TFormValue Left = 250 Top = 155 BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = 'FormValue' ClientHeight = 116 ClientWidth = 521 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Str_Panel: TPanel Left = 0 Top = 0 Width = 521 Height = 116 Align = alClient BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 0 object Org_Label: TLabel Left = 12 Top = 40 Width = 38 Height = 13 Caption = 'Orginal:' Font.Charset = DEFAULT_CHARSET Font.Color = clMaroon Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object Val_Label: TLabel Left = 12 Top = 64 Width = 30 Height = 13 Caption = 'Value:' Font.Charset = DEFAULT_CHARSET Font.Color = clMaroon Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object Name_Label: TLabel Left = 12 Top = 16 Width = 31 Height = 13 Caption = 'Name:' Font.Charset = DEFAULT_CHARSET Font.Color = clMaroon Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object Size_Label: TLabel Left = 392 Top = 16 Width = 23 Height = 13 Caption = 'Size:' Font.Charset = DEFAULT_CHARSET Font.Color = clMaroon Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object Org_Edit: TEdit Left = 56 Top = 36 Width = 457 Height = 21 Color = clBtnFace ReadOnly = True TabOrder = 10 end object Ok_Btn: TButton Left = 304 Top = 88 Width = 65 Height = 21 Caption = '&OK' Default = True ModalResult = 1 TabOrder = 5 OnClick = OkApply_Cmd end object Cancel_Btn: TButton Left = 376 Top = 88 Width = 65 Height = 21 Cancel = True Caption = '&Cancel' ModalResult = 2 TabOrder = 6 end object Apply_Btn: TButton Left = 448 Top = 88 Width = 65 Height = 21 Caption = '&Apply' TabOrder = 7 OnClick = OkApply_Cmd end object Val_Edit: TEdit Left = 56 Top = 60 Width = 457 Height = 21 TabOrder = 0 end object Name_Edit: TEdit Left = 56 Top = 12 Width = 321 Height = 21 Color = clBtnFace ReadOnly = True TabOrder = 8 end object Save_Btn: TButton Left = 128 Top = 88 Width = 65 Height = 21 Caption = '&Save' TabOrder = 3 OnClick = Save_Cmd end object Load_Btn: TButton Left = 56 Top = 88 Width = 65 Height = 21 Caption = '&Load' TabOrder = 2 OnClick = Load_Cmd end object Size_Edit: TEdit Left = 424 Top = 12 Width = 89 Height = 21 Color = clBtnFace ReadOnly = True TabOrder = 9 end object FileName_Btn: TButton Left = 200 Top = 88 Width = 65 Height = 21 Caption = '&FileName' Enabled = False TabOrder = 4 OnClick = FileName_Cmd end object Val_Rich: TRichEdit Left = 56 Top = 60 Width = 457 Height = 21 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Courier New' Font.Style = [] ParentFont = False PlainText = True TabOrder = 1 OnKeyDown = Val_Rich_KeyDown OnKeyPress = Val_Rich_KeyPress end end object OpenDialog1: TOpenDialog Options = [ofHideReadOnly, ofFileMustExist, ofEnableSizing] Left = 8 Top = 80 end object SaveDialog1: TSaveDialog Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing] Left = 24 Top = 80 end end